home *** CD-ROM | disk | FTP | other *** search
/ Precision Software Appli…tions Silver Collection 1 / Precision Software Applications Silver Collection Volume One (PSM) (1993).iso / windows / games / bjack1.exe / MAINFORM.FRM (.txt) < prev    next >
Visual Basic Form  |  1991-11-19  |  38KB  |  435 lines
  1. MainForm
  2. Wired On BlackJack
  3. wwwwwww
  4. wwwwwwwp
  5. Form1*
  6. !    HelpLabel
  7. FPlease use the Game --> Connect menu option to start a Blackjack game.
  8. OnLineTimer
  9. DealerPictureBox
  10. CheatButton
  11. Cheat
  12.     HitButton
  13. PlayHandButton
  14.     Play Hand
  15.     YesButton
  16. StandButton
  17. Stand
  18. PictureBox
  19. BetBox
  20. Text1
  21. DoubleDownButton
  22. Dbl Down
  23. NoButton
  24. BetScrollBar    
  25. SplitButton
  26. Split
  27. OkButton
  28. CoinsPicture1
  29. CoinsPicture3
  30. CoinsPicture2
  31. CoinsPicture4
  32. CoinsPicture5
  33. InterruptTimer
  34. DecisionTimer
  35.     ScrollBar    
  36. GameMenu
  37. &Game
  38. ConnectOption
  39. &Connect...
  40. DisconnectOption
  41. &Disconnect
  42. separtor
  43. AboutOption
  44.     &About...
  45. QuitOption
  46. E&xit
  47. OptionsOption
  48. &Options
  49. DeckOption2
  50. &Deck...
  51.     separator
  52. AlwaysPlayOption
  53. &Always Play
  54. NeverPlayOption
  55. &Never Play
  56. ManualPlayOption
  57. &Manual Play
  58. separator3
  59. SoundOption
  60. &Sound
  61. Form_Click)
  62. @    Form_Load
  63. OpenFile
  64. FileName
  65. Result
  66. FileDataJ
  67. OFSTRUCT
  68. Form13
  69. FileHandle
  70. FileRead#
  71. InputBuffer:
  72. DosWaitNmPipe
  73.     FileClose
  74. Get_Serverg
  75. ErrorMessageK
  76. Display_Errora
  77. FileMenuOption_Click
  78. Index
  79. HScroll1_Change
  80. Picture1_Click
  81. ExitMenuOption_Click
  82. Response
  83. Form_GotFocus
  84. ConnectOption_Click
  85. PipeHandle8
  86. OpenPipeP
  87. pcktE
  88. PACKET
  89. PACKET3u
  90. Action
  91. ACTN_START$
  92. Write_Packetw
  93. Process_MessagesM
  94.     Open_Pipe
  95. Servers
  96. server_info_1^
  97. Server
  98. sv1_name!
  99. ServerNameM
  100. PipeNameg
  101. TempString
  102. ConnectButton_Click
  103. QuitButton_Click
  104. Close_Pipe
  105. ConnectButton
  106. Enabled
  107. FALSE8
  108. DrawButton
  109. TRUEb
  110. StayButton
  111. SplitButton:
  112. SecurityButton
  113. SecurityButton_Click
  114. InsuranceButton0
  115. StayButton_Click
  116.     HitButton
  117. StandButton
  118. DoubleDownButtonR
  119. SurrenderButton
  120. PlayHandButton/
  121. PlayHandButton_ClickD
  122. ACTN_PLAYHAND
  123. HitButton_Click
  124. ACTN_
  125.     ACTN_DRAWu
  126. StandButton_Click
  127.     ACTN_STAY
  128. SplitButton_Click>
  129. ACTN_SPLIT
  130. InsuranceButton_Click
  131. ACTN_SECURITYm
  132. DisconnectButton#
  133. DoubleDownButton_Click
  134. ACTN_DOUBLEw
  135. SurrenderButton_Click
  136. ACTN_SURRENDER
  137. pckt2
  138. PlayHandButton_DragDrop?
  139. Source
  140. DisconnectButton_Click
  141. ACTN_LOGOFF
  142. repeat
  143. ProcessMessages
  144. InterruptTimerc
  145. InterruptTimer_Timer
  146. DosMakeMailslot(
  147. pszName
  148. cbMessageSize
  149. cbMailslotSize
  150. phMailslot`
  151. DosPeekMailslot
  152.     hMailslot
  153. pbBufferB
  154. pcbReturned
  155. pcbNextSize
  156. pusNextPriorityu
  157. DosDeleteMailslot-
  158. DosReadMailslot
  159. cTimeout
  160. MailSlotHandle
  161. Get_Server_And_Name
  162. PlayerName
  163. GetName
  164. PlayerNameBox
  165. GetBetO
  166.     HelpLabel
  167. Caption
  168. ACTN_CONNECT
  169. ACTN_PLAY_HAND
  170. Clear_Player_Data
  171. Close_Connection{
  172. InsuranceTimer_Timer)
  173. InsuranceTimer
  174. InsuranceForm}    
  175. cdtInitm
  176. uReturn0    
  177. Draw_Player
  178. DosPeekNmPipeC    
  179. Handle
  180. Buffer
  181. BufLen
  182. bRead
  183. bAvailm
  184. Status
  185. MainForm0
  186. PictureBoxI
  187.     ScaleMode]
  188. HelpLabel_Clickt    @
  189. ScrollBar_Change
  190. DisconnectOption_Click
  191. GameMenu_Click
  192. QuitOption_Click
  193. ConnectOption
  194. DisconnectOption
  195. PictureBox_Click(
  196. separator_Click
  197. DealerPictureBox_Click-
  198. Form_UnloadJ
  199. Cancelb    
  200. DealerPictureBoxT    
  201. NetWkstaGetInfo
  202. wksta_info_10
  203. ErrorBytes
  204. wki10_username4
  205. UNLEN
  206. Wksta_Info
  207. LMNetWkstaGetInfo_L10
  208. VB_WkstaInfo5
  209.     ScrollBar
  210. Valuex
  211. Sorry
  212. scroll
  213. implementedf
  214. feature5
  215.     ScaleLeft
  216. Redraw_All_Players
  217. AboutOption_ClickW
  218.     AboutFormp
  219. CurrentPlayerIndex
  220. QueryInsureForm
  221. DecisionTimer_Timer
  222. ACTN_NO_RESPONSE
  223. DecisionTimerR
  224. Clear_Data_Table
  225. OnLineTimer_Timer
  226. ACTN_READYC
  227. OnLineTimer
  228. OnLine
  229. Please
  230. Connect
  231. connection 
  232. dealer
  233. DeckOption_Click
  234. ChooseDeckForm
  235. DeckId
  236. PlayerArray
  237. XOffset.
  238. BoxWidth
  239. Color
  240. Form_Paint
  241. ScaleWidth
  242. ScaleHeight
  243. Form_Resize
  244. Visible
  245. CashOnHandU
  246. PreviousTextc
  247. PreviousString
  248. CheatButton_Click
  249. ACTN_CHEATr
  250. CheatButton{
  251. PACKETpcktZ
  252. DecidingPlayerIndex
  253. MaintainBalance
  254. Draw_HighLight_Bar
  255. DeckOption2_Clicke
  256. AlwaysPlayOption_Click
  257. AlwaysPlayOptiond
  258. Checked
  259. WindowStateU
  260. PictureBox_DblClickC
  261. DefaultBet
  262. PictureBox_MouseDown
  263. Button
  264. Shiftz
  265. WhichClick
  266. NeverPlayOption
  267. ManualPlayOption
  268. ManualPlayOption_Click
  269. NeverPlayOption_Click,
  270. DecisionTimerPurposeS
  271. DO_NOTHING'
  272. DO_DEFAULT_ACTION
  273. DO_PLAY_HANDA
  274.     NO_PLAYER
  275. PictureBox_Paint
  276. Request_New_Hand
  277. SentPlayHand
  278. Process_Play_Hand
  279. PLAYER_REGION_WIDTH
  280.     GamePhase
  281. PHASE_WANT_TO_PLAY7
  282. NoButton_Click|
  283. YesButton_Click
  284. PlayHandForm
  285. NoButton:
  286.     YesButton
  287. OKButton_Click!
  288.     IntValue1
  289. ACTN_BET
  290. BetBox
  291. OkButton
  292. BetScrollBard
  293. PHASE_GET_BETw
  294. PHASE_QUERY_BET
  295. switch
  296. Default
  297. BetScrollBar_Change:
  298. BetBox_Change
  299.     BetAmount
  300. BetBox_KeyPressC
  301. KeyAscii
  302. CommentLabel
  303. BetFlag
  304. PHASE_QUERY_SECURITY
  305. SecurityM
  306. BaseString
  307. PASSTHRU
  308. NOPASSTHRU
  309. Handle_Disconnect
  310. LostForm
  311. OkButton_KeyPress
  312. PHASE_QUERY_BET_ONE
  313.     PlaySound
  314. PHASE_QUERY_BET_TWO
  315. SoundOption_Click
  316. SoundOption#
  317. Interval
  318. RANDOM_SOUND
  319. PictureBox_GotFocus
  320. PictureBox_DragOver
  321. State
  322. CoinsPicture4_Click^
  323.  tracks the type of click on the pictureboxx
  324. ConnectOption_Click
  325. Connect to a server's dealer service. This pipe name to connect with is "dealer35"
  326. Select the Blackjack server you wish to use.
  327.  If the user did not choose a server then return
  328. ZYXABC
  329. Please use the Game --> Connect menu option to start a Blackjack game.
  330. \pipe\dealer35
  331. Get the player's namea
  332. Please enter your name."
  333.  Open pipe
  334.  check if pipe opened successfully
  335. Could not open connection"
  336. Error Window
  337. Please use the Game --> Connect menu option to start a Blackjack game.
  338.  send ACTN_START
  339. This sets up packet reading at a specified interval.
  340. You are viewing a hand in play."
  341. PlayHandButton_Click
  342. HitButton_Click
  343. You have chosen to HIT
  344. StandButton_Click
  345. You have chosen to STAND
  346. SplitButton_Click
  347. You have chosen to SPLIT."
  348. DoubleDownButton_Click
  349. You have chosen to DOUBLE DOWN
  350. InterruptTimer_Timer
  351. This timer checks the pipe for messages from the dealer. It is not possible to check
  352. for message constantly because that approach would keep the CPU busy with checking
  353. the network and no time to react to the user interface, effectively "crashing" the
  354. system for the user.
  355. Form_Load
  356. No Name"
  357. ScrollBar_Change
  358. DisconnectOption_Click
  359. QuitOption_Click
  360. Form_Unload
  361. AboutOption_Click
  362. DecisionTimer_Timer
  363. The decision timer gives the player a limited amount of time to decide on his/her next
  364. move. If no move is decided the default action will be taken. This default actionn
  365. depends upon the current phase of the game. For example, if a hand is in playy
  366. the default action is to STAND. If a bet is being made the default action is too
  367. assume the amount of the bet is the amount currently in the BetBox text box.
  368. bet"$
  369. Form_Paint
  370. CheatButton_Click
  371. If the user clicks on the Cheat button (which appears randomly) then punish him.
  372. Too bad. Half of your cash has been confiscated, but maybe cheating next time will work.
  373. OnLineTimer_Timer
  374. The dealer cycles through all currently connected players continuously to see if
  375. anyone has made any requests. When the dealer advances to the next player on its
  376. list it will send that player a MSG_ON_LINE. This indicates that the dealer is listening
  377. to that player. That player provides the user a small amount of time
  378. (determined by OnLineTimer) to make any actions, if the user makes an action
  379. then the dealer is notified of that, if not the timer goes off and the dealerr
  380. is notified that this player has nothing to say at the moment so go ahead andd
  381. check other players. If the player makes an action while he is not "online""
  382. then that action is buffered. By having a small enough timeslice thiss
  383. round-robin technique reacts quick enough for this game.
  384. On Line request returned with no action.u
  385. DeckOption2_Click
  386. AlwaysPlayOption_Click
  387.  When the player chooses to be in AlwaysPlay mode the software will automaticallyy
  388.  request a new hand from the dealer whenever the current hand is done.
  389. If there is no hand currently in play then request a new hand right away.a
  390. PictureBox_DblClick
  391. double clicking on the picture box indicates "hit me"m
  392. PictureBox_MouseDown
  393. ManualPlayOption_Click
  394. Manual Play mode let's the user choose when and if they want to start a new hand.e
  395. The hand is over. Click on Play Hand to start a new hand."
  396. NeverPlayOption_Click
  397. Never play mode informs the dealer that this player never wishes to join in a hand..
  398. Therefore the player will always remain in view mode.e
  399. The hand is over."
  400. PictureBox_Paint
  401. NoButton_Click
  402. Depending upon the phase of the game the No button is handled differently.
  403. If the phase is PHASE_WANT_TO_PLAY then clicking on the no button indicatess
  404. that the player does not wish to join in the current hand.
  405. If the phase is PHASE_QUERY_SECURITY then clicking on the no button indicatess
  406. that the player does not want any insurance for the current hand.o
  407.  The ACTN_READY here indicates that this player does not want to play.
  408. A new hand is about to begin."
  409. Please wait while other players decide on insurance.
  410. YesButton_Click
  411. Please wait while other players decide on insurance.
  412. OKButton_Click
  413.  This button is used when a bet is to be obtained.
  414. Please wait while other players make their bets.
  415. BetScrollBar_Change
  416. Moving the scrollbar changes the amount of the bet and adds humorous comment.d
  417. Enter your bet."
  418. Hey, no pain, no gain.
  419. Hey, we have a high roller here.
  420. Here goes lunch for next week.
  421. Keep it up."
  422. Bet more. Bet more."
  423. Even more than that.
  424. What's another 100?"
  425. Just do it."
  426. You did it."
  427. Can't you stop doing it?
  428. Oooh. We got a live one.
  429. BetBox_Change
  430.  Make sure that the amount entered in the BetBox is within the CashOnHand for thee
  431.  current player. Also update the scroll bar to reflect the number just entered.h
  432. BetBox_KeyPress
  433. OkButton_KeyPress
  434. SoundOption_Click
  435.